﻿Imports DAO
Imports DTO

Public Class BanVe
    Private dao_banve As New DAO.BanVe
    
    Public Function GetHV(ByVal macb As String) As DataSet
        Return Me.dao_banve.GetHV(macb)
    End Function
    Public Function GetCBHV(ByVal macb As String, ByVal mahv As String) As DataSet
        Return Me.dao_banve.GetCBHV(macb, mahv)
    End Function
    Public Function GetSB() As DataSet
        Return Me.dao_banve.GetSB()
    End Function
    Public Function GetChuyenBay(ByVal masb As Integer, ByVal masbd As Integer, ByVal dbay As String) As DataSet
        Return Me.dao_banve.GetChuyenBay(masb, masbd, dbay)
    End Function
    Public Function GetCMND(ByVal cmnd As String) As DataSet
        Return Me.dao_banve.GetCMND(cmnd)
    End Function
    Public Function LuuKH(ByVal khachhang As DTO.BanVe) As Integer
        Return Me.dao_banve.LuuKH(khachhang)
    End Function
    Public Function Muave(ByVal vecb As DTO.BanVe) As Integer
        Return Me.dao_banve.Muave(vecb)
    End Function
    Public Function GetSBTG(ByVal mcb As String) As DataSet
        Return Me.dao_banve.GetSBTG(mcb)
    End Function
    Public Function LayMaCBHV(ByVal macb As Integer, ByVal mahv As Integer) As DataSet
        Return Me.dao_banve.LayMaCBHV(macb, mahv)
    End Function
    Public Function DemSoGheDat(ByVal macbhv As Integer) As Integer
        Return Me.dao_banve.DemSoGheDat(macbhv)
    End Function
    Public Function KTGheTrong(ByVal soghe As Integer) As Boolean
        If soghe > 0 Then
            Return True
        End If
        Return False
    End Function
End Class
